home *** CD-ROM | disk | FTP | other *** search
/ Gigarom 1 / Gigarom Macintosh Archives (Quantum Leap)(CDRM1080320)(1993).iso / FILES / HYP / A-B / Bible.cpt / Hyper Sword / card_10670.txt < prev    next >
Text File  |  1989-07-04  |  5KB  |  241 lines
  1. -- card: 10670 from stack: in
  2. -- bmap block id: 0
  3. -- flags: 0000
  4. -- background id: 2636
  5. -- name: 
  6.  
  7.  
  8. -- part 1 (button)
  9. -- low flags: 00
  10. -- high flags: 0005
  11. -- rect: left=20 top=224 right=247 bottom=42
  12. -- title width / last selected line: 0
  13. -- icon id / first selected line: 0 / 0
  14. -- text alignment: 1
  15. -- font id: 0
  16. -- text size: 12
  17. -- style flags: 0
  18. -- line height: 16
  19. -- part name: New Button
  20. ----- HyperTalk script -----
  21. on mouseUp
  22.   set the cursor to 4
  23.   global duplicate
  24.   global scoring
  25.   add 1 to scoring
  26.   put"" into background field id"21"
  27.   get loc of background field id"21"
  28.   choose browse tool
  29.   Play"Applause"
  30.   click at it
  31.   type"Correct - Keep up the Good Work."
  32.   add 1 to duplicate
  33. end mouseUp
  34.  
  35.  
  36.  
  37. -- part 2 (button)
  38. -- low flags: 00
  39. -- high flags: 0005
  40. -- rect: left=20 top=132 right=155 bottom=42
  41. -- title width / last selected line: 0
  42. -- icon id / first selected line: 0 / 0
  43. -- text alignment: 1
  44. -- font id: 0
  45. -- text size: 12
  46. -- style flags: 0
  47. -- line height: 16
  48. -- part name: New Button
  49. ----- HyperTalk script -----
  50. on mouseUp
  51.   set the cursor to 4
  52.   global duplicate
  53.   put"" into background field id"21"
  54.   get loc of background field id"21"
  55.   choose browse tool
  56.   click at it
  57.   play"boing"
  58.   type"Sorry your answer is incorrect"
  59.   add 1 to duplicate
  60. end mouseUp
  61.  
  62.  
  63.  
  64. -- part 3 (button)
  65. -- low flags: 00
  66. -- high flags: 0005
  67. -- rect: left=20 top=155 right=178 bottom=42
  68. -- title width / last selected line: 0
  69. -- icon id / first selected line: 0 / 0
  70. -- text alignment: 1
  71. -- font id: 0
  72. -- text size: 12
  73. -- style flags: 0
  74. -- line height: 16
  75. -- part name: New Button
  76. ----- HyperTalk script -----
  77. on mouseUp
  78.   set the cursor to 4
  79.   global duplicate
  80.   put"" into background field id"21"
  81.   get loc of background field id"21"
  82.   choose browse tool
  83.   click at it
  84.   play"boing"
  85.   type"Sorry your answer is incorrect"
  86.   add 1 to duplicate
  87. end mouseUp
  88.  
  89.  
  90.  
  91. -- part 4 (button)
  92. -- low flags: 00
  93. -- high flags: 0005
  94. -- rect: left=20 top=178 right=201 bottom=42
  95. -- title width / last selected line: 0
  96. -- icon id / first selected line: 0 / 0
  97. -- text alignment: 1
  98. -- font id: 0
  99. -- text size: 12
  100. -- style flags: 0
  101. -- line height: 16
  102. -- part name: New Button
  103. ----- HyperTalk script -----
  104. on mouseUp
  105.   set the cursor to 4
  106.   global duplicate
  107.   put"" into background field id"21"
  108.   get loc of background field id"21"
  109.   choose browse tool
  110.   click at it
  111.   play"boing"
  112.   type"Sorry your answer is incorrect"
  113.   add 1 to duplicate
  114. end mouseUp
  115.  
  116.  
  117.  
  118. -- part 5 (button)
  119. -- low flags: 00
  120. -- high flags: 0005
  121. -- rect: left=20 top=201 right=224 bottom=42
  122. -- title width / last selected line: 0
  123. -- icon id / first selected line: 0 / 0
  124. -- text alignment: 1
  125. -- font id: 0
  126. -- text size: 12
  127. -- style flags: 0
  128. -- line height: 16
  129. -- part name: New Button
  130. ----- HyperTalk script -----
  131. on mouseUp
  132.   set the cursor to 4
  133.   global duplicate
  134.   put"" into background field id"21"
  135.   get loc of background field id"21"
  136.   choose browse tool
  137.   click at it
  138.   play"boing"
  139.   type"Sorry your answer is incorrect"
  140.   add 1 to duplicate
  141. end mouseUp
  142.  
  143.  
  144.  
  145. -- part 6 (button)
  146. -- low flags: 00
  147. -- high flags: 0005
  148. -- rect: left=20 top=109 right=132 bottom=42
  149. -- title width / last selected line: 0
  150. -- icon id / first selected line: 0 / 0
  151. -- text alignment: 1
  152. -- font id: 0
  153. -- text size: 12
  154. -- style flags: 0
  155. -- line height: 16
  156. -- part name: New Button
  157. ----- HyperTalk script -----
  158. on mouseUp
  159.   set the cursor to 4
  160.   global duplicate
  161.   put"" into background field id"21"
  162.   get loc of background field id"21"
  163.   choose browse tool
  164.   click at it
  165.   play"boing"
  166.   type"Sorry your answer is incorrect"
  167.   add 1 to duplicate
  168. end mouseUp
  169.  
  170.  
  171.  
  172. -- part 7 (button)
  173. -- low flags: 00
  174. -- high flags: 0005
  175. -- rect: left=20 top=247 right=270 bottom=42
  176. -- title width / last selected line: 0
  177. -- icon id / first selected line: 0 / 0
  178. -- text alignment: 1
  179. -- font id: 0
  180. -- text size: 12
  181. -- style flags: 0
  182. -- line height: 16
  183. -- part name: New Button
  184. ----- HyperTalk script -----
  185. on mouseUp
  186.   set the cursor to 4
  187.   global duplicate
  188.   put"" into background field id"21"
  189.   get loc of background field id"21"
  190.   choose browse tool
  191.   click at it
  192.   play"boing"
  193.   type"Sorry your answer is incorrect"
  194.   add 1 to duplicate
  195. end mouseUp
  196.  
  197.  
  198.  
  199. -- part contents for background part 37
  200. ----- text -----
  201. 25
  202.  
  203. -- part contents for background part 32
  204. ----- text -----
  205. The Creation Stage
  206.  
  207. -- part contents for background part 43
  208. ----- text -----
  209. Genesis 1:6-8
  210.  
  211. -- part contents for background part 1
  212. ----- text -----
  213. What did God do on the second day of creation?
  214.  
  215. -- part contents for background part 12
  216. ----- text -----
  217. Created the sun and moon.
  218.  
  219. -- part contents for background part 13
  220. ----- text -----
  221. Created animal wildlife, reptiles and man.
  222.  
  223. -- part contents for background part 14
  224. ----- text -----
  225. God rested.
  226.  
  227. -- part contents for background part 15
  228. ----- text -----
  229. Created light.
  230.  
  231. -- part contents for background part 16
  232. ----- text -----
  233. Created fish and birds.
  234.  
  235. -- part contents for background part 17
  236. ----- text -----
  237. Created the atmosphere.
  238.  
  239. -- part contents for background part 18
  240. ----- text -----
  241. Gathered the oceans and created seed-bearing plants.